home *** CD-ROM | disk | FTP | other *** search
/ Network CD 2 / Network CD - Volume 2.iso / programs / internet / tcp / amitcp / amitcp-api-22.lha / AmiTCP-2.2 / src / netlib / serveraccept.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-10-14  |  3.8 KB  |  157 lines
  1. RCS_ID_C="$Id: serveraccept.c,v 1.2 1993/10/15 01:15:36 ppessi Exp $";
  2. /*
  3.  * Author: ppessi <Pekka.Pessi@hut.fi>
  4.  *
  5.  * Copyright © 1993 AmiTCP/IP Group, <amitcp-group@hut.fi>
  6.  *                  Helsinki University of Technology, Finland.
  7.  *                  All rights reserved.
  8.  *
  9.  * Created      : Tue May 25 19:30:13 1993 ppessi
  10.  * Last modified: Fri Oct 15 00:50:51 1993 ppessi
  11.  * 
  12.  * $Log: serveraccept.c,v $
  13.  * Revision 1.2  1993/10/15  01:15:36  ppessi
  14.  * Use now StrToLong()
  15.  *
  16.  * Revision 1.1  1993/06/03  23:27:19  ppessi
  17.  * Cosmetic changes for version 1.0
  18.  *
  19.  */
  20.  
  21. /****** inetdlib.doc/serveraccept *******************************************
  22. *
  23. *  NAME
  24. *       serveraccept - Accept a server connection on named port
  25. *
  26. *  SYNOPSIS
  27. *       socket = serveraccept(name, peer);
  28. *
  29. *       long serveraccept(char *, struct sockaddr_in *);
  30. *
  31. *  DESCRIPTION
  32. *       The serveraccept() library call binds a socket to the named Internet
  33. *       TCP port. Then it listens the socket and accepts the connection to
  34. *       the port. The peer's socket address is returned in sockaddr pointed
  35. *       by sockaddr argument.
  36. *
  37. *       The port name is resolved by getservbyname() call. A numeric value
  38. *       for port name is also accepted.
  39. * 
  40. *       This module is meant for daemon developing.
  41. *
  42. *  INPUTS
  43. *       name     - port name or numeric string.
  44. *       peer     - pointer to struct sockaddr_in
  45. *
  46. *  RESULT
  47. *        socket - positive socket id for success or -1 for failure.
  48. *
  49. *        peer   - sockaddr_in structure containing peer's internet address.
  50. *                 Note that on error, the structure containing peer address
  51. *                 is not necessarily updated.
  52. *
  53. *  AUTHOR
  54. *       Pekka Pessi, the AmiTCP/IP Group, <amitcp-group@hut.fi>,
  55. *       Helsinki University of Technology, Finland.
  56. *
  57. *  SEE ALSO
  58. *        bsdsocket/accept, bsdsocket/getservbyname
  59. *
  60. *****************************************************************************
  61. *
  62. */
  63.  
  64. #ifdef AMIGA
  65. #if __SASC
  66. #include <proto/socket.h>
  67. #include <proto/dos.h>
  68. #include <clib/exec_protos.h>
  69. #include <pragmas/exec_sysbase_pragmas.h>
  70. #elif __GNUC__
  71. #include <inline/socket.h>
  72. #include <inline/exec.h>
  73. #else
  74. #include <clib/socket_protos.h>
  75. #endif
  76. #endif /* AMIGA */
  77.  
  78. #include <errno.h>
  79. #include <netdb.h>
  80.  
  81. #include <sys/param.h>
  82. #include <sys/socket.h>
  83. #include <sys/ioctl.h>
  84. #include <netinet/in.h>
  85.  
  86. #include <signal.h>
  87.  
  88. #include <dos/dos.h>
  89. #include <exec/execbase.h>
  90. #include <dos/var.h>
  91.  
  92. #include <stdlib.h>
  93.  
  94. /*
  95.  * serveraccept:
  96.  *      Accept a server socket from the named port
  97.  */
  98. long
  99. serveraccept(char *pname, struct sockaddr_in *ha)
  100. {
  101.   struct sockaddr_in sin; 
  102.   long ha_len = sizeof(*ha);
  103.   int s, sa;
  104.   long port;
  105.   struct servent *sp;
  106.   long on = 1;
  107.  
  108.   /* Create address corresponding our service */
  109.   bzero((caddr_t)&sin, sizeof(sin));
  110. #ifdef BSD4_4
  111.   sin.sin_len = sizeof(struct sockaddr_in);
  112. #endif
  113.   sin.sin_family = AF_INET;
  114.  
  115.   /* A port must be in the range 1 - 65535 */
  116.   if (StrToLong(pname, &port) > 0 && port < 65536 )
  117.     sin.sin_port = port;
  118.   else if (sp = getservbyname(pname, "tcp"))
  119.     sin.sin_port = sp->s_port;
  120.   else {
  121.     return -1;
  122.   }
  123.  
  124.   sin.sin_addr.s_addr = INADDR_ANY;
  125.  
  126.   if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
  127.     PrintNetFault(Errno(), "socket");
  128.     return -1;
  129.   }
  130.  
  131.   /* Reuse this port */
  132.   if (setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on)) < 0) {
  133.     PrintNetFault(Errno(), "setsockopt");
  134.     sa = -1; goto Return;
  135.   }
  136.  
  137.   /* Bind it to socket */
  138.   if (bind(s, (struct sockaddr *)&sin, sizeof(sin)) < 0 ) {
  139.     PrintNetFault(Errno(), "bind");
  140.     sa = -1; goto Return;
  141.   }
  142.  
  143.   if (listen(s, 1) < 0) {
  144.     PrintNetFault(Errno(), "listen");
  145.     sa = -1; goto Return;
  146.   }
  147.  
  148.   if ((sa = accept(s, (struct sockaddr *)ha, &ha_len)) < 0){
  149.     PrintNetFault(Errno(), "accept");
  150.   }
  151.  
  152.  Return:
  153.   CloseSocket(s);
  154.   return sa;
  155. }
  156.  
  157.